home *** CD-ROM | disk | FTP | other *** search
/ Let's Discover Louisiana / Let's Discover Louisiana.iso / pc / FILES / TIME.dxr / 00322_ttGameLoop.ls < prev    next >
Encoding:
Text File  |  2002-12-03  |  8.4 KB  |  328 lines

  1. global aFull, bFull, cFull, aContains, bContains, cContains, guess1, guess2, guess3
  2.  
  3. on exitFrame me
  4.   if (sprite(103).visible = 1) or (sprite(102).visible = 1) then
  5.     go(the frame)
  6.   else
  7.     if sprite 25 intersects sprite(28) then
  8.       if (aFull = 1) and (aContains <> "1") then
  9.         sprite(28).loc = point(206, 517)
  10.         guess1 = 0
  11.         if (bFull = 1) and (bContains = "1") then
  12.           bFull = 0
  13.           bContains = 0
  14.         end if
  15.         if (cFull = 1) and (cContains = "1") then
  16.           cFull = 0
  17.           cContains = 0
  18.         end if
  19.       else
  20.         sprite(28).loc = point(168, 136)
  21.         guess1 = "A"
  22.         aFull = 1
  23.         aContains = "1"
  24.         if (bFull = 1) and (bContains = "1") then
  25.           bFull = 0
  26.           bContains = 0
  27.         end if
  28.         if (cFull = 1) and (cContains = "1") then
  29.           cFull = 0
  30.           cContains = 0
  31.         end if
  32.       end if
  33.     end if
  34.     if sprite 25 intersects sprite(29) then
  35.       if (aFull = 1) and (aContains <> "2") then
  36.         sprite(29).loc = point(306, 517)
  37.         guess1 = 0
  38.         if (bFull = 1) and (bContains = "2") then
  39.           bFull = 0
  40.           bContains = 0
  41.         end if
  42.         if (cFull = 1) and (cContains = "2") then
  43.           cFull = 0
  44.           cContains = 0
  45.         end if
  46.       else
  47.         sprite(29).loc = point(168, 136)
  48.         guess2 = "A"
  49.         aFull = 1
  50.         aContains = "2"
  51.         if (bFull = 1) and (bContains = "2") then
  52.           bFull = 0
  53.           bContains = 0
  54.         end if
  55.         if (cFull = 1) and (cContains = "2") then
  56.           cFull = 0
  57.           cContains = 0
  58.         end if
  59.       end if
  60.     end if
  61.     if sprite 25 intersects sprite(30) then
  62.       if (aFull = 1) and (aContains <> "3") then
  63.         sprite(30).loc = point(406, 517)
  64.         guess1 = 0
  65.         if (bFull = 1) and (bContains = "3") then
  66.           bFull = 0
  67.           bContains = 0
  68.         end if
  69.         if (cFull = 1) and (cContains = "3") then
  70.           cFull = 0
  71.           cContains = 0
  72.         end if
  73.       else
  74.         sprite(30).loc = point(168, 136)
  75.         guess3 = "A"
  76.         aFull = 1
  77.         aContains = "3"
  78.         if (bFull = 1) and (bContains = "3") then
  79.           bFull = 0
  80.           bContains = 0
  81.         end if
  82.         if (cFull = 1) and (cContains = "3") then
  83.           cFull = 0
  84.           cContains = 0
  85.         end if
  86.       end if
  87.     end if
  88.     if sprite 26 intersects sprite(28) then
  89.       if (bFull = 1) and (bContains <> "1") then
  90.         sprite(28).loc = point(206, 517)
  91.         guess1 = 0
  92.         if (aFull = 1) and (aContains = "1") then
  93.           aFull = 0
  94.           aContains = 0
  95.         end if
  96.         if (cFull = 1) and (cContains = "1") then
  97.           cFull = 0
  98.           cContains = 0
  99.         end if
  100.       else
  101.         sprite(28).loc = point(168, 203)
  102.         guess1 = "B"
  103.         bFull = 1
  104.         bContains = "1"
  105.         if (aFull = 1) and (aContains = "1") then
  106.           aFull = 0
  107.           aContains = 0
  108.         end if
  109.         if (cFull = 1) and (cContains = "1") then
  110.           cFull = 0
  111.           cContains = 0
  112.         end if
  113.       end if
  114.     end if
  115.     if sprite 26 intersects sprite(29) then
  116.       if (bFull = 1) and (bContains <> "2") then
  117.         sprite(29).loc = point(306, 517)
  118.         guess1 = 0
  119.         if (aFull = 1) and (aContains = "2") then
  120.           aFull = 0
  121.           aContains = 0
  122.         end if
  123.         if (cFull = 1) and (cContains = "2") then
  124.           cFull = 0
  125.           cContains = 0
  126.         end if
  127.       else
  128.         sprite(29).loc = point(168, 203)
  129.         guess2 = "B"
  130.         bFull = 1
  131.         bContains = "2"
  132.         if (aFull = 1) and (aContains = "2") then
  133.           aFull = 0
  134.           aContains = 0
  135.         end if
  136.         if (cFull = 1) and (cContains = "2") then
  137.           cFull = 0
  138.           cContains = 0
  139.         end if
  140.       end if
  141.     end if
  142.     if sprite 26 intersects sprite(30) then
  143.       if (bFull = 1) and (bContains <> "3") then
  144.         sprite(30).loc = point(406, 517)
  145.         guess1 = 0
  146.         if (aFull = 1) and (aContains = "3") then
  147.           aFull = 0
  148.           aContains = 0
  149.         end if
  150.         if (cFull = 1) and (cContains = "3") then
  151.           cFull = 0
  152.           cContains = 0
  153.         end if
  154.       else
  155.         sprite(30).loc = point(168, 203)
  156.         guess3 = "B"
  157.         bFull = 1
  158.         bContains = "3"
  159.         if (aFull = 1) and (aContains = "3") then
  160.           aFull = 0
  161.           aContains = 0
  162.         end if
  163.         if (cFull = 1) and (cContains = "3") then
  164.           cFull = 0
  165.           cContains = 0
  166.         end if
  167.       end if
  168.     end if
  169.     if sprite 27 intersects sprite(28) then
  170.       if (cFull = 1) and (cContains <> "1") then
  171.         sprite(28).loc = point(206, 517)
  172.         guess1 = 0
  173.         if (bFull = 1) and (bContains = "1") then
  174.           bFull = 0
  175.           bContains = 0
  176.         end if
  177.         if (aFull = 1) and (aContains = "1") then
  178.           aFull = 0
  179.           aContains = 0
  180.         end if
  181.       else
  182.         sprite(28).loc = point(168, 270)
  183.         guess1 = "C"
  184.         cFull = 1
  185.         cContains = "1"
  186.         if (bFull = 1) and (bContains = "1") then
  187.           bFull = 0
  188.           bContains = 0
  189.         end if
  190.         if (aFull = 1) and (aContains = "1") then
  191.           aFull = 0
  192.           aContains = 0
  193.         end if
  194.       end if
  195.     end if
  196.     if sprite 27 intersects sprite(29) then
  197.       if (cFull = 1) and (cContains <> "2") then
  198.         sprite(29).loc = point(306, 517)
  199.         guess1 = 0
  200.         if (bFull = 1) and (bContains = "2") then
  201.           bFull = 0
  202.           bContains = 0
  203.         end if
  204.         if (aFull = 1) and (aContains = "2") then
  205.           aFull = 0
  206.           aContains = 0
  207.         end if
  208.       else
  209.         sprite(29).loc = point(168, 270)
  210.         guess2 = "C"
  211.         cFull = 1
  212.         cContains = "2"
  213.         if (bFull = 1) and (bContains = "2") then
  214.           bFull = 0
  215.           bContains = 0
  216.         end if
  217.         if (aFull = 1) and (aContains = "2") then
  218.           aFull = 0
  219.           aContains = 0
  220.         end if
  221.       end if
  222.     end if
  223.     if sprite 27 intersects sprite(30) then
  224.       if (cFull = 1) and (cContains <> "3") then
  225.         sprite(30).loc = point(406, 517)
  226.         guess1 = 0
  227.         if (bFull = 1) and (bContains = "3") then
  228.           bFull = 0
  229.           bContains = 0
  230.         end if
  231.         if (aFull = 1) and (aContains = "3") then
  232.           aFull = 0
  233.           aContains = 0
  234.         end if
  235.       else
  236.         sprite(30).loc = point(168, 270)
  237.         guess3 = "C"
  238.         cFull = 1
  239.         cContains = "3"
  240.         if (bFull = 1) and (bContains = "3") then
  241.           bFull = 0
  242.           bContains = 0
  243.         end if
  244.         if (aFull = 1) and (aContains = "3") then
  245.           aFull = 0
  246.           aContains = 0
  247.         end if
  248.       end if
  249.     end if
  250.     if sprite 28 intersects sprite(25) then
  251.     else
  252.       if sprite 28 intersects sprite(26) then
  253.       else
  254.         if sprite 28 intersects sprite(27) then
  255.         else
  256.           sprite(28).loc = point(206, 517)
  257.           guess1 = 0
  258.           if aContains = "1" then
  259.             aFull = 0
  260.             aContains = 0
  261.           end if
  262.           if bContains = "1" then
  263.             bFull = 0
  264.             bContains = 0
  265.           end if
  266.           if cContains = "1" then
  267.             cFull = 0
  268.             cContains = 0
  269.           end if
  270.         end if
  271.       end if
  272.     end if
  273.     if sprite 29 intersects sprite(25) then
  274.     else
  275.       if sprite 29 intersects sprite(26) then
  276.       else
  277.         if sprite 29 intersects sprite(27) then
  278.         else
  279.           sprite(29).loc = point(306, 517)
  280.           guess2 = 0
  281.           if aContains = "2" then
  282.             aFull = 0
  283.             aContains = 0
  284.           end if
  285.           if bContains = "2" then
  286.             bFull = 0
  287.             bContains = 0
  288.           end if
  289.           if cContains = "2" then
  290.             cFull = 0
  291.             cContains = 0
  292.           end if
  293.         end if
  294.       end if
  295.     end if
  296.     if sprite 30 intersects sprite(25) then
  297.     else
  298.       if sprite 30 intersects sprite(26) then
  299.       else
  300.         if sprite 30 intersects sprite(27) then
  301.         else
  302.           sprite(30).loc = point(406, 517)
  303.           guess3 = 0
  304.           if aContains = "3" then
  305.             aFull = 0
  306.             aContains = 0
  307.           end if
  308.           if bContains = "3" then
  309.             bFull = 0
  310.             bContains = 0
  311.           end if
  312.           if cContains = "3" then
  313.             cFull = 0
  314.             cContains = 0
  315.           end if
  316.         end if
  317.       end if
  318.     end if
  319.     updateStage()
  320.     if the frameLabel <> "EndGame" then
  321.       go(the frame + 1)
  322.     else
  323.       sprite(113).visible = 1
  324.       go(the frame)
  325.     end if
  326.   end if
  327. end
  328.